function P=MC_step_player(G,P,k)
v=0;
P.Neighbors=[];
for k=1:G.N,
    r=norm(G.P{k}.pos-P.pos);
    if r<G.R,
        v=v+G.P{k}.ang;
        P.Neighbors=[P.Neighbors,k];
    end;
end;
P.ang=v/(length(P.Neighbors));
P.pos=P.pos+P.speed*G.h*[cos(P.ang),sin(P.ang)];
P.Vars=[P.pos,P.ang];
